include(xmldef.m4)divert(-1)

define_( html_tag_,"{_addlist(TAG, $1)}")


_html_tag_( html)	
_html_tag_( head)
_html_tag_( body)	
_html_tag_( title)
_html_tag_( div)
_html_tag_( h1)
_html_tag_( h2)
_html_tag_( h3)
_html_tag_( h4)
_html_tag_( h5)
_html_tag_( h6)
_html_tag_( p)
_html_tag_( br)
_html_tag_( hr)
_html_tag_( pre)		
_html_tag_( ul)
_html_tag_( ol)
_html_tag_( li)
_html_tag_( dl)
_html_tag_( dt)
_html_tag_( dd)
_html_tag_( a)
_html_tag_( i)
_html_tag_( b)


_foreach_( _list(TAG), "{tag_def_}")

define_( li_tag_,"{_(li,,$1
)}")

define_( list_tags_,"{
_(ul,,
_foreach_( _list(TAG),"{li_tag_}")
)
}")


	                define_( HTML,"{_open_tag(HTML,$@)}")
	   		define_( END_HTML,"{_end_tag(HTML)}")
	   		define_( BODY,"{_open_tag(BODY,$@)}")
	   		define_( END_BODY,"{_end_tag(BODY)}")
	   		define_( PRE,"{_open_tag(PRE,$@)}")
	   		define_( END_PRE,"{_end_tag(PRE)}")

  this opens the door for collecting a Table of Contents, numbering, etc..

define_(h,"{_(h$1,shift($@))}")

 divert(0)dnl
